home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / mmedia / system / ap2 / scripts / m1____i1.p2s < prev    next >
Encoding:
Text File  |  1994-05-11  |  1.6 KB  |  97 lines
  1. ###########################################################################
  2. #
  3. # TEST DESCRIPTION: Open, load and play to
  4. # completion all MIDI types and check sound quality.
  5. #
  6. ###########################################################################
  7. #
  8. #   OPEN THE MIDIPLAYER
  9. #   WAIT FOR SUCCESSFUL OPEN
  10. #
  11. ############################################
  12.  
  13.  
  14. open ?AP2PATH?type1.mid alias midi1 wait
  15.  
  16. # Play type1.mid
  17. play midi1 wait
  18.  
  19. @CHECK Did the type1.MID play correctly?
  20.  
  21. close midi1 wait
  22.  
  23. ###################################
  24.  
  25. open ?AP2PATH?type0.mid alias midi1 wait
  26.  
  27.  
  28. # Play type0.mid
  29. play midi1 wait
  30.  
  31. @CHECK Did the type0.MID play correctly?
  32.  
  33. close midi1 wait
  34.  
  35. ####################################
  36.  
  37. open ?AP2PATH?BALLGAME.MID alias midi1 wait
  38.  
  39.  
  40. # Play midi file
  41. play midi1 wait
  42.  
  43. @CHECK Did the BALLGAME.MID play correctly?
  44.  
  45.  
  46. close midi1 wait
  47.  
  48.  
  49. ##################################
  50. #
  51. open ?AP2PATH?BACH.MID alias midi1 wait
  52.  
  53.  
  54. # Play midi file
  55. play midi1 wait
  56.  
  57. @CHECK Did the BACH.MID play correctly?
  58.  
  59. close midi1 wait
  60.  
  61. ###################################
  62.  
  63. open ?AP2PATH?BLUEJAM.MID alias midi1 wait
  64.  
  65.  
  66. # Play midi file
  67. play midi1 wait
  68.  
  69. @CHECK Did the BLUEJAM.MID play correctly?
  70.  
  71. close midi1 wait
  72. #
  73. #################################
  74.  
  75. open ?AP2PATH?HOLIDAY.MID alias midi1 wait
  76.  
  77.  
  78. # Play midi file
  79. play midi1 wait
  80.  
  81. @CHECK Did the HOLIDAY.MID play correctly?
  82.  
  83. close midi1 wait
  84. #
  85. ########################################
  86. #
  87. open ?AP2PATH?IBMRALLY.MID alias midi1 wait
  88.  
  89. # Play MIDI file
  90. play midi1 wait
  91.  
  92. @CHECK Did the IBMRALLY.MID play correctly?
  93.  
  94.  
  95. close midi1 wait
  96. #
  97.